str
	...
	prm !wp_syl = Get(weight_percent);

'--------------------------------------------------------------------------------
' Conditional PO correction if wt% > user-defined threshold
' User interaction needed: 
' - give hkl in str_hkl_angle 
' - check min/max for PO 
' - define wt% threshold
'--------------------------------------------------------------------------------

	prm !wp_cut_syl = 2.0;
	str_hkl_angle !ang 2 0 0
	prm po_prm 1 min =0.6; max = 1.4;
	scale_pks = 
		If(wp_syl > wp_cut_syl,
           Multiplicities_Sum( PO_eqn(po_prm, ang) ),
           1
           );
		   
' End Conditional PO ------------------------------------------------------------